home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmfreec / _setup.1 / AHMTLeds.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-09  |  2.5 KB  |  81 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTLeds.pas' rev: 3.00
  6.  
  7. #ifndef AHMTLedsHPP
  8. #define AHMTLedsHPP
  9. #include <AHMFreeware.hpp>
  10. #include <ExtCtrls.hpp>
  11. #include <Graphics.hpp>
  12. #include <Controls.hpp>
  13. #include <Classes.hpp>
  14. #include <SysUtils.hpp>
  15. #include <Messages.hpp>
  16. #include <Windows.hpp>
  17. #include <SysInit.hpp>
  18. #include <System.hpp>
  19.  
  20. //-- user supplied -----------------------------------------------------------
  21.  
  22. namespace Ahmtleds
  23. {
  24. //-- type declarations -------------------------------------------------------
  25. class DELPHICLASS TAHMLed;
  26. class PASCALIMPLEMENTATION TAHMLed : public Controls::TGraphicControl 
  27. {
  28.     typedef Controls::TGraphicControl inherited;
  29.     
  30. private:
  31.     Ahmfreeware::TAHMAboutFreeStr FAbout;
  32.     int finter;
  33.     bool frun;
  34.     bool fled;
  35.     Extctrls::TTimer* ftim;
  36.     Graphics::TColor fdon;
  37.     Graphics::TColor fdoff;
  38.     Graphics::TColor fback;
  39.     Graphics::TColor fccol;
  40.     void __fastcall Setfdon(Graphics::TColor value);
  41.     void __fastcall Setfdoff(Graphics::TColor value);
  42.     void __fastcall Setback(Graphics::TColor value);
  43.     void __fastcall SeTAHMLed(bool value);
  44.     void __fastcall Setrun(bool value);
  45.     void __fastcall SetInter(int value);
  46.     
  47. protected:
  48.     virtual void __fastcall Paint(void);
  49.     void __fastcall Runit(System::TObject* Sender);
  50.     
  51. public:
  52.     __fastcall virtual TAHMLed(Classes::TComponent* AOwner);
  53.     __fastcall virtual ~TAHMLed(void);
  54.     void __fastcall LedOn(void);
  55.     void __fastcall LedOff(void);
  56.     void __fastcall Blink(void);
  57.     
  58. __published:
  59.     __property Ahmfreeware::TAHMAboutFreeStr About = {read=FAbout, write=FAbout};
  60.     __property OnClick ;
  61.     __property OnDblClick ;
  62.     __property Visible ;
  63.     __property bool LedisOn = {read=fled, write=SeTAHMLed, nodefault};
  64.     __property Graphics::TColor LedOnColor = {read=fdon, write=Setfdon, nodefault};
  65.     __property Graphics::TColor LedOffColor = {read=fdoff, write=Setfdoff, nodefault};
  66.     __property Graphics::TColor LedShadow = {read=fback, write=Setback, nodefault};
  67.     __property int Interval = {read=finter, write=SetInter, nodefault};
  68.     __property bool Blinking = {read=frun, write=Setrun, nodefault};
  69.     __property Hint ;
  70.     __property ShowHint ;
  71. };
  72.  
  73. //-- var, const, procedure ---------------------------------------------------
  74.  
  75. }    /* namespace Ahmtleds */
  76. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  77. using namespace Ahmtleds;
  78. #endif
  79. //-- end unit ----------------------------------------------------------------
  80. #endif    // AHMTLeds
  81.